/*
- 格式化类: 对日志消息进行格式化封装
- 格式化子项类的实现: 从日志消息中取出指定的元素, 追加到一块内存空间中
    1. 设计一个抽象的格式化子项基类
    2. 基于基类, 派生出不同的格式化子项子类 --- [主体消息,日志等级,时间...]
*/

#ifndef __M_FMT_H__
#define __M_FMT_H__

#include "util.hpp"
#include "message.hpp"
#include "level.hpp"
#include <memory>
#include <cassert>
#include <sstream>
#include <vector>
#include <tuple>

namespace LOG
{
    // 格式化基类
    class FormatItem
    {
    public:
        using ptr = std::shared_ptr<FormatItem>;
        virtual ~FormatItem() {}
        // 将msg中的消息追加到os内存空间中
        virtual void format(std::ostream &os, const LogMsg &msg) = 0;
    };

    // 日志的具体内容消息
    class MsgFormatItem : public FormatItem
    {
    public:
        MsgFormatItem(const std::string &str = "") {}
        virtual void format(std::ostream &os, const LogMsg &msg)
        {
            os << msg._payload;
        }
    };

    // 日志等级
    class LevelFormatItem : public FormatItem
    {
    public:
        LevelFormatItem(const std::string &str = "") {}
        virtual void format(std::ostream &os, const LogMsg &msg)
        {
            os << LogLevel::toString(msg._level);
        }
    };

    // 日志器名称
    class NameFormatItem : public FormatItem
    {
    public:
        NameFormatItem(const std::string &str = "") {}
        virtual void format(std::ostream &os, const LogMsg &msg)
        {
            os << msg._name;
        }
    };

    // 线程ID
    class ThreadFormatItem : public FormatItem
    {
    public:
        ThreadFormatItem(const std::string &str = "") {}
        virtual void format(std::ostream &os, const LogMsg &msg)
        {
            os << msg._tid;
        }
    };

    // 时间
    class TimeFormatItem : public FormatItem
    {
    private:
        std::string _format;

    public:
        TimeFormatItem(const std::string &format = "%H:%M:%S") : _format(format)
        {
            if (format.empty())
                _format = "%H:%M:%S";
        }
        virtual void format(std::ostream &os, const LogMsg &msg)
        {
            // 格式化时间, 并且放入指定内存中
            time_t t = msg._ctime;
            struct tm lt;
            localtime_r(&t, &lt);
            char tmp[128];
            strftime(tmp, 127, _format.c_str(), &lt);
            os << tmp;
        }
    };

    // 源文件名称
    class CFileFormatItem : public FormatItem
    {
    public:
        CFileFormatItem(const std::string &str = "") {}
        virtual void format(std::ostream &os, const LogMsg &msg)
        {
            os << msg._file;
        }
    };

    // 行号
    class CLineFormatItem : public FormatItem
    {
    public:
        CLineFormatItem(const std::string &str = "") {}
        virtual void format(std::ostream &os, const LogMsg &msg)
        {
            os << msg._line;
        }
    };

    // 制表符
    class TabFormatItem : public FormatItem
    {
    public:
        TabFormatItem(const std::string &str = "") {}
        virtual void format(std::ostream &os, const LogMsg &msg)
        {
            os << "\t";
        }
    };

    // 换行符
    class NLineFormatItem : public FormatItem
    {
    public:
        NLineFormatItem(const std::string &str = "") {}
        virtual void format(std::ostream &os, const LogMsg &msg)
        {
            os << "\n";
        }
    };

    // 其他类型的消息
    class OtherFormatItem : public FormatItem
    {
    private:
        std::string _str;

    public:
        OtherFormatItem(const std::string &str = "") : _str(str) {}
        virtual void format(std::ostream &os, const LogMsg &msg)
        {
            os << _str;
        }
    };

    // 格式化类
    class Formatter
    {
    public:
        using ptr = std::shared_ptr<Formatter>;
        /*
            %d 日期, 包含子格式 {%H:%M:%S}
            %T 缩进
            %t 线程ID
            %p 日志级别
            %c 日志器名称
            %f 文件名
            %l 行号
            %m 日志消息
            %n 换行
        */

        // 时间{年-月-日 时:分:秒}缩进 线程ID 缩进 [日志级别] 缩进 [日志名称] 缩进 文件名:行号 缩进 消息换行
        Formatter(const std::string &pattern = "[%d{%H:%M:%S}]%T[%t]%T[%p]%T[%c]%T[%f:%l]%T%m%n") : _pattern(pattern)
        {
            // 判断字符串是否解析成功
            assert(parsePattern());
        }

        const std::string pattern() { return _pattern; }

        // 对msg进行格式化
        std::ostream &format(std::ostream &os, const LogMsg &msg)
        {
            for (auto &it : _items)
            {
                it->format(os, msg);
            }
            return os;
        }

        std::string format(const LogMsg &msg)
        {
            std::stringstream ss;

            for (auto it : _items)
            {
                it->format(ss, msg);
            }
            return ss.str();
        }

    private:
        // TODO
        //  对格式化字符串进行解析, 取出其中的各项数据
        bool parsePattern()
        {
            // 1. 对格式化规则字符串进行解析
            // ab%%cde[%d{%H:%M:%S}][%p]%T%m%n
            std::vector<std::pair<std::string, std::string>> fmt_order;
            size_t pos = 0;
            std::string key, val;
            while (pos < _pattern.size())
            {
                // 1.处理原始字符串--判断是否是%, 不是就是原始字符
                if (_pattern[pos] != '%')
                {
                    val.push_back(_pattern[pos++]);
                    continue;
                }
                // 说明pos位置就是%字符, %%处理成为一个原始%字符
                if (pos + 1 < _pattern.size() && _pattern[pos + 1] == '%')
                {
                    val.push_back('%');
                    pos += 2;
                    continue;
                }

                // 说明pos位置是%, 并且其后是一个格式化字符, 代表原始字符串处理完毕
                // 添加原始字符串
                if (val.empty() == false)
                {
                    fmt_order.push_back(std::make_pair("", val));
                    val.clear();
                }
                pos += 1; // 这一步之后, pos指向格式化字符位置
                if (pos == _pattern.size())
                {
                    std::cout << "%之后,没有对应的格式化字符!\n";
                    return false;
                }
                key = _pattern[pos];

                // 将pos指向格式化字符后的位置
                pos += 1;

                // 说明格式化字符后有子格式
                if (pos < _pattern.size() && _pattern[pos] == '{')
                {
                    pos += 1; // pos指向子格式的起始位置
                    while (pos < _pattern.size() && _pattern[pos] != '}')
                    {
                        val.push_back(_pattern[pos++]);
                    }

                    // 走到了末尾跳出循环, 则代表没有遇到}, 代表格式错误
                    if (pos == _pattern.size())
                    {
                        std::cout << "子规则{}匹配出错!\n";
                        return false; // 没有找到
                    }

                    pos += 1; // pos指向}位置, +1走到新位置
                }
                fmt_order.push_back(std::make_pair(key, val));
                key.clear();
                val.clear();
            }

            // 2. 根据解析到的数据初始化子项数组成员
            for (auto &it : fmt_order)
            {
                _items.push_back(createItem(it.first, it.second));
            }
            return true;
        }

        // 根据不同的格式化字符创建不同的格式化子项
        FormatItem::ptr createItem(const std::string &key, const std::string &val)
        {
            if (key == "m")
                return FormatItem::ptr(new MsgFormatItem(val));
            if (key == "p")
                return FormatItem::ptr(new LevelFormatItem(val));
            if (key == "c")
                return FormatItem::ptr(new NameFormatItem(val));
            if (key == "t")
                return FormatItem::ptr(new ThreadFormatItem(val));
            if (key == "n")
                return FormatItem::ptr(new NLineFormatItem(val));
            if (key == "d")
                return FormatItem::ptr(new TimeFormatItem(val));
            if (key == "f")
                return FormatItem::ptr(new CFileFormatItem(val));
            if (key == "l")
                return FormatItem::ptr(new CLineFormatItem(val));
            if (key == "T")
                return FormatItem::ptr(new TabFormatItem(val));
            if (key == "")
                return FormatItem::ptr(new OtherFormatItem(val));
            std::cout << "没有对应的格式化字符:%" << key << std::endl;
            abort();
            return FormatItem::ptr();
        }

    private:
        std::string _pattern;                // 格式化规则字符串
        std::vector<FormatItem::ptr> _items; // 格式化子项数组
    };
}

#endif